00100 TITLE TEST 00200 00300 S: OUTSTR[BYTE(7)15,12,106,101,124↔"AL - "⊗1↔0] 00400 JRST .-1 00500 END S